The append command takes an unlimited ammount of arguments. It works by constructing
a single list given multiple in the same order that they are specified. When appending
to an assoc you can either append another list or simply apend a pair.
------------------------------------------------------------------------------------ 


(define l1 (quote (1 2 3 4 5)))
(define l2 (quote (6 7 8 9 0)))

(write (append l1 l2))

(define l3 (assoc (pair 1 "one") (pair 2 "two")))
(define l4 (assoc (pair 2 "2") (pair 1 "1") (pair 4 "4")))
(write (append l3 (pair 3 "3") (pair 4 "four") l4))
